# -*- mode: snippet -*-
# name: survSplit from survival Split A Survival Data Set At Specified Times
# key: survSplit
# --
.split <- survSplit(
data    = $0,
cut     = c(0:50), # vector of timepoints to cut at
end     = "time",  # event time variable
event   = "event", # censoring indicator
start   = "start", # start time variable (created)
id      = "id",    # new id variable to create
zero    = 0,       # If start doesn't already exist, used as start
episode = NULL     # character string with name of new episode variable (optional)
)
